rem
	bbdoc: Contains all types of tiles
end rem
Type TTile
	Field code:Int'Code of this tile
	
	Field name:String'Name for tile
	Field description:String'Describes tile
	
	'Color of this tile
	Field colorR:Int
	Field colorG:Int
	Field colorB:Int
	
	'Collisions apply to this tile?(Boolean)
	Field collides:Int
	
	Method colorSet(R:Int, G:Int, B:Int)
		colorR = R
		colorG = G
		colorB = B
	End Method
End Type

Global TILE_EARTH:TTile = New TTile
TILE_EARTH.code = 46
TILE_EARTH.collides = 0
TILE_EARTH.colorSet(124, 115, 44)

TILE_EARTH.name = "Mud"
TILE_EARTH.description = "Just muddied ground"

Global TILE_WALL:TTile = New TTile
TILE_WALL.code = Asc("=")
TILE_WALL.collides = 1
TILE_WALL.colorSet(84, 86, 80)

TILE_WALL.name = "Wall"
TILE_WALL.description = "Looks like usual wall. It's made of beton"
